home *** CD-ROM | disk | FTP | other *** search
- 1 s=700:rem *** change s to relocate *** c-64 version ***
- 2 printchr$(147):print:forj=stos+20
- 3 reada:pokej,a:x=x+a:nextj:ifx<>3473thenprint"error in data...":end
- 4 print"the data is loaded...":print:print"sys"s"to activate...":end
- 5 data32,228,255,240,3,133,251,96,238,32,208,162
- 6 data90,202,208,253,141,18,208,240,235
-